source('~/Desktop/Empirical Research/Plots/MASTER Script/RUN ALL.R')
source('~/Desktop/Empirical Research/Plots/Group Income Effect/Aggregate.R')
source('~/Desktop/Empirical Research/Income Distribution/Gini Ratio/Hierarchical Levels/Empirical/Aggregate Studies/Data Merge.R')
setwd("~/Desktop/Empirical Research/Income Distribution/Gini Ratio/Hierarchical Levels/Empirical/Aggregate Studies")
source("Data Merge.R")
source('~/Desktop/Empirical Research/Income Distribution/Gini Ratio/Hierarchical Levels/Empirical/Aggregate Studies/Data Merge.R')
dirname(sys.frame(1)$ofile)
setwd("~/Desktop/Empirical Research/Income Distribution/Gini Ratio/Hierarchical Levels/Empirical/Aggregate Studies")
source("Data Merge.R")
dirname(rstudioapi::getActiveDocumentContext()$path)
dirname(rstudioapi::getActiveDocumentContext()$path)
dirname(rstudioapi::getActiveDocumentContext()$path)
dirname(rstudioapi::getActiveDocumentContext()$path)
